home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-04
/
422mods.zip
/
CONAN12.422
< prev
next >
Wrap
Text File
|
1993-04-12
|
3KB
|
72 lines
1CONAN12 3- 5Message reply status modification!
Conan #1 @7304
Wednesday, April 7, 1993 4:01 pm [EST]
┌────────────────────────────────────────────────────────────────────────────┐
│ Mod Name : CONAN12 Mod Author: Conan 1@473 ComLink │
│ Difficulty : ███▒▒▒▒▒▒▒ 1@7304 IceNet │
│ WWIV Version : 4.22 1@7300 WWIVWeb │
│ Mod Date : 04/07/93 1@7307 WWIVNet │
│ Files Affected: MSGBASE.C 1@17325 WWIVLink │
│ Description : Message reply mod! │
└────────────────────────────────────────────────────────────────────────────┘
This is one of the few mods that I figured out myself! And I find this one
quite useful.
Backup your source! I take no responsibility whatsoever that this mod
may cause to your system.
Open up MSGBASE.C
= *anony=anony_sender;
= break;
= case anony_real_name:
= real_name=1;
= *anony=0;
= break;
= }
+ prt(5,"Request reply? "); /* CONAN12 ADD */
+ if (yn()) { /* CONAN12 ADD */
+ strcpy(reply,"Reply Requested"); /* CONAN12 ADD */
+ } else /* CONAN12 ADD */
+ strcpy(reply,"No Reply Needed"); /* CONAN12 ADD */
= outstr(get_string(91));
= if (fsed) {
= i5=open(fnx,O_RDONLY | O_BINARY);
= l1=filelength(i5);
= } else {
= l1=0;
= for (i5=0; i5<curli; i5++) {
Go down about 30 lines or so and fix up the following....
= if (irt[0]) {
= sprintf(s,"Regarding: %s",irt); /* I changed my RE: to Regarding: */
= addline(b,s,&l1);
= if (irt_name[0]) {
= sprintf(s,"Posted By: %s",irt_name); /* And I changed BY: to Posted By: */
= addline(b,s,&l1);
+ sprintf(s,"MsgStatus: %s\r\n",reply); /* CONAN12 ADD */
+ s[thisuser.screenchars]=0; /* CONAN12 ADD */
+ addline(b,s,&l1); /* CONAN12 ADD */
= }
= addline(b,"",&l1);
= }
There must be approximately 5,000,210 message reply mods out there...
but now there's 5,000,211!!! I honestly just felt the need to write a mod
or put one together that I actually use! Anyways...if you're having problems
you can call my board at Perfect World BBS (703)255-6606 or E-Mail me on any
of the following networks:
1@473 ComLink
1@7304 IceNet
1@7300 WWIVWeb
1@7307 WWIVNet
1@17325 WWIVLink
1C7onan